1 REM *** DVORAK KEYBOARD/MAPLE/FIG 1
4 OPEN4,4:CMD4:C$=CHR$(8)+CHR$(13)+CHR$(15)
5 PRINTCHR$(14)
6 PRINT"  [176][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][174]"CHR$(8)+CHR$(13)+CHR$(14);
7 PRINT"  [221]    DVORAK LAYOUT    [221]"CHR$(8)+CHR$(13)+CHR$(14);
8 PRINT"  [173][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][189]
9 [153][199](15)[170][199](17):X$[178]"       "
100 B$[178][199](128):Q$[178][199](8)[170]B$[170][199](135)[170]B$[170][199](135)[170]B$[170]B$[170][199](15)[170][199](17)
110 [153]X$[170]"ORTAN=TAN=TAN=TAN=TAN=TAN=TAN=TAN=TAN=TAN=TAN=TAN^"C$;
120 [153]X$[170]"(null)1(null)2(null)3(null)4(null)5(null)6(null)7(null)8(null)9(null)0(null)](null)=(null)"C$;
130 [153]X$[170]"/=>=>=>=>=>=>=>=>=>=>=>=EXP"C$;
140 [153]X$[170]" (null)'(null),(null).(null)P(null)Y(null)F(null)G(null)C(null)R(null)L(null)?(null)"C$;
150 [153]X$[170]" /=>=>=>=>=>=>=>=>=>=>=>^     (null)(null)(null)VAL(null)CLOSELENATN(null)VAL"C$;
160 [153]X$[170]"  (null)A(null)O(null)E(null)U(null)I(null)D(null)H(null)T(null)N(null)S(null)-(null)"C$;
170 [153]X$[170]" OR>=>=>=>=>=>=>=>=>=>=>=EXP"C$;
180 [153]X$[170]" (null) (null);(null)Q(null)J(null)K(null)X(null)B(null)M(null)W(null)V(null)Z(null)"C$;
190 [153]X$[170]" /TAN>TAN>TAN>TAN>TAN>TAN>TAN>TAN>TAN>TAN>TANEXP"C$;
200 [153]
210 [153]X$[170]"ORTAN=TAN=TAN=TAN=TAN=TAN=TAN=TAN=TAN=TAN=TAN=TAN^"C$;
220 [153]X$[170]"(null)!(null)@(null)#(null)$(null)%(null)C(null)&(null)*(null)((null))(null)[(null)+(null)"C$;
230 [153]X$[170]"/=>=>=>=>=>=>=>=>=>=>=>=EXP"C$;
240 [153]X$[170]" (null)"[170]Q$[170]"(null),(null).(null)(null)(null)(null)(null)ASC(null)CHR$(null)LEN(null)(null)(null)(null)(null)?(null)"C$;
250 [153]X$[170]" /=>=>=>=>=>=>=>=>=>=>=>^     (null)(null)(null)VAL(null)CLOSELENATN(null)VAL"C$;
260 [153]X$[170]"  (null)ATN(null)(null)(null)VAL(null)(null)(null)RIGHT$(null)STR$(null)LEFT$(null)(null)(null)(null)(null)(null)(null)TO(null)"C$;
270 [153]X$[170]" OR>=>=>=>=>=>=>=>=>=>=>=EXP"C$;
280 [153]X$[170]" (null) (null):(null)(null)(null)MID$(null)(null)(null)(null)(null)PEEK(null)(null)(null)(null)(null)(null)(null)(null)(null)"C$;
290 [153]X$[170]" /TAN>TAN>TAN>TAN>TAN>TAN>TAN>TAN>TAN>TAN>TANEXP"C$;
300 [153]:[153]:[153]:[153]:[153]"              STR$VORAK KEYBOARD/(null)APLE/ASCRIGHT$CHR$(null)(null)VAL 1"
9999 [152]4:[160]4